home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows 6-Pak - Disc 6
/
Windows 6-Pak (InfoMagic) (Disc 6) (1999).ISO
/
Text-Editors
/
CTextE3.EXE
/
Textedit.exe
/
0
/
RCDATA
/
TFRAMEFORM
/
TFRAMEFORM.txt
< prev
Wrap
Text File
|
1998-07-25
|
17KB
|
531 lines
object FrameForm: TFrameForm
Left = 174
Top = 188
Width = 578
Height = 224
Hint = 'Castillo TextEditor'
Caption = 'Castillo TextEditor'
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
FormStyle = fsMDIForm
Icon.Data = {<image000.ico>}
Menu = MainMenu1
Position = poDefault
WindowMenu = Window1
OnActivate = FormActivate
OnCreate = FormCreate
OnDestroy = FormDestroy
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 16
object StatusBar1: TStatusBar
Left = 0
Top = 158
Width = 570
Height = 20
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Panels = <
item
Width = 200
end
item
Alignment = taCenter
Width = 50
end
item
Alignment = taCenter
Width = 50
end
item
Alignment = taCenter
Width = 50
end>
ParentFont = False
SimplePanel = False
end
object Toolbar971: TToolbar97
Left = 22
Top = 30
Width = 259
Height = 52
Caption = 'Toolbar'
CloseButton = False
OnDockChanged = Toolbar971DockChanged
object cmbtn1: TToolbarButton97
Left = 4
Top = 2
Width = 25
Height = 25
Hint = 'New Text File...'
Glyph.Data = {
4E010000424D4E01000000000000760000002800000013000000120000000100
040000000000D80000000000000000000000100000001000000000000000C0C0
C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111111000001111111111111111111000001111111111111111111000001110
0000000000111110000011102222222220111110000011102222222220111110
0000111022222222201111100000111022222222201111100000111022222222
2011111000001110222222222011111000001110222222222011111000001110
2222222220111110000011102222220000111110000011102222220201111110
0000111022222200111111100000111000000001111111100000111111111111
111111100000111111111111111111100000}
ParentShowHint = False
ShowHint = True
OnClick = NewChild
end
object cmbtn2: TToolbarButton97
Left = 35
Top = 2
Width = 25
Height = 25
Hint = 'Open Existing Text File...'
Glyph.Data = {
4E010000424D4E01000000000000760000002800000013000000120000000100
040000000000D800000000000000000000001000000010000000000000000084
8400C0C0C00000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222000002222222222222222222000002222222222222222222000002000
0000000022222220000020011111111102222220000020301111111110222220
0000204301111111110222200000203430111111111022200000204343000000
0000022000002034343434302222222000002043434343402222222000002034
3000000022222220000022000222222220002220000022222222222222002220
0000222222222022202022200000222222222200022222200000222222222222
222222200000222222222222222222200000}
ParentShowHint = False
ShowHint = True
OnClick = OpenChild
end
object cmbtn3: TToolbarButton97
Left = 85
Top = 2
Width = 25
Height = 25
Hint = 'Save Text File'
Enabled = False
Glyph.Data = {
4E010000424D4E01000000000000760000002800000013000000120000000100
040000000000D800000000000000000000001000000010000000000000000084
8400C0C0C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222000002222222222222222222000002220000000000000222000002201
1000000330102220000022011000000330102220000022011000000330102220
0000220110000000001022200000220111111111111022200000220110000000
0110222000002201033333333010222000002201033333333010222000002201
0333333330102220000022010333333330102220000022010333333330002220
0000220103333333303022200000220000000000000022200000222222222222
222222200000222222222222222222200000}
ParentShowHint = False
ShowHint = True
OnClick = Save1Click
end
object speedbutton1: TToolbarButton97
Left = 60
Top = 2
Width = 25
Height = 25
Hint = 'Delete Text File'
Enabled = False
Glyph.Data = {
5A010000424D5A01000000000000760000002800000014000000130000000100
040000000000E40000000000000000000000100000001000000000000000C6C6
C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111111100001111111111111111111100001111111111111111111100001111
1011111111110111000011110001111111111111000011110000111111101111
0000111110001111110111110000111111000111100111110000111111100011
0011111100001111111100000111111100001111111110001111111100001111
1111000001111111000011111110001100111111000011111000011110011111
0000111100001111110011110000111100011111111101110000111111111111
111111110000111111111111111111110000111111111111111111110000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object cmbtn4: TToolbarButton97
Left = 116
Top = 2
Width = 25
Height = 25
Hint = 'Print Text File'
Enabled = False
Glyph.Data = {
4E010000424D4E01000000000000760000002800000013000000120000000100
040000000000D800000000000000000000001000000010000000000000008484
8400C0C0C000C6C6C60000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222000002222222222222222222000002220000000000022222000002203
3333333303022220000020000000000000302220000020333333444330002220
0000203333331113303022200000200000000000003302200000203333333333
0303022000002200000000003030022000002220555555550303022000002222
0500000500002220000022220555555550222220000022222050000050222220
0000222220555555550222200000222222000000000222200000222222222222
222222200000222222222222222222200000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton7Click
end
object cmbtn8: TToolbarButton97
Left = 147
Top = 2
Width = 25
Height = 25
Hint = 'Undo...'
Enabled = False
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000010000000000000008484
8400C0C0C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222222222222222222222222222222222222222222222222222222222221
0222220000022222012222000022222220222200022222222022220020222222
2022220222002222012222222222000012222222222222222222222222222222
222222222222222222222222222222222222}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton8Click
end
object cmbtn6: TToolbarButton97
Left = 197
Top = 2
Width = 25
Height = 25
Hint = 'Copy Selection to Clipboard'
Enabled = False
Glyph.Data = {
4E010000424D4E01000000000000760000002800000013000000120000000100
040000000000D80000000000000000000000100000001000000000000000C0C0
C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111111000001111111111111111111000001111111111111111111000001111
1110000000001110000011111110222222201110000011111110200000201110
0000100000002222222011100000102222202000002011100000102000002222
2220111000001022222020020000111000001020000022220201111000001022
2220222200111110000010200200000001111110000010222202011111111110
0000102222001111111111100000100000011111111111100000111111111111
111111100000111111111111111111100000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton5Click
end
object cmbtn5: TToolbarButton97
Left = 172
Top = 2
Width = 25
Height = 25
Hint = 'Cut Selection to Clipboard'
Enabled = False
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111111100111111111111101101100111111110110101101111111011010110
1111111100010110111111111101000111111111110001111111111111101111
1111111111000111111111111101011111111111100100111111111110111011
1111111110111011111111111011101111111111111111111111}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton4Click
end
object cmbtn7: TToolbarButton97
Left = 222
Top = 2
Width = 25
Height = 25
Hint = 'Paste from Clipboard'
Enabled = False
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
00000084840084848400FFFFFF00C0C0C00000FFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00444444444444
4444444444111111111140000017777777710323231711111171023232177777
7771032323171117111102323217777717140323231777771144023232111111
1044032323232323204402300000000330440330555555032044023206006032
3044400000660000044444444000044444444444444444444444}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton6Click
end
object ToolbarSep971: TToolbarSep97
Left = 29
Top = 2
Width = 6
Height = 25
end
object ToolbarSep972: TToolbarSep97
Left = 141
Top = 2
Width = 6
Height = 25
end
object ToolbarSep973: TToolbarSep97
Left = 110
Top = 2
Width = 6
Height = 25
end
end
object Dock972: TDock97
Left = 0
Top = 9
Width = 9
Height = 140
BoundLines = [blLeft]
Position = dpLeft
end
object Dock973: TDock97
Left = 561
Top = 9
Width = 9
Height = 140
BoundLines = [blRight]
Position = dpRight
end
object Dock974: TDock97
Left = 0
Top = 149
Width = 570
Height = 9
BoundLines = [blBottom]
Position = dpBottom
end
object Dock971: TDock97
Left = 0
Top = 0
Width = 570
Height = 9
BoundLines = [blTop]
end
object ColorGrid1: TColorGrid
Left = 235
Top = 39
Width = 100
Height = 100
TabOrder = 6
Visible = False
end
object ColorGrid2: TColorGrid
Left = 373
Top = 41
Width = 100
Height = 100
TabOrder = 7
Visible = False
end
object OpenFileDialog: TOpenDialog
Filter =
' All Files (*.*) | *.*|Text Files| *.txt|Source Files|*.html; *.' +
'htm;*.bas;*.c;*.pas'
Options = [ofHideReadOnly, ofAllowMultiSelect]
Left = 309
Top = 123
end
object MainMenu1: TMainMenu
Left = 189
Top = 125
object File1: TMenuItem
Caption = '&File'
object New1: TMenuItem
Caption = '&New'
Hint = 'New Text File'
ShortCut = 16462
OnClick = NewChild
end
object Open1: TMenuItem
Caption = '&Open...'
Hint = 'Open an Existing Text File'
ShortCut = 16463
OnClick = OpenChild
end
object N15: TMenuItem
Caption = '-'
end
object Exit1: TMenuItem
Caption = 'E&xit'
Hint = 'Exit Castillo TextEditor'
OnClick = Exit1Click
end
object N1: TMenuItem
Caption = '-'
end
object N2: TMenuItem
Caption = ' '
OnClick = N2Click
end
object N3: TMenuItem
Caption = ' '
OnClick = N3Click
end
object N4: TMenuItem
Caption = ' '
OnClick = N4Click
end
object N5: TMenuItem
Caption = ' '
OnClick = N5Click
end
object N6: TMenuItem
Caption = ' '
OnClick = N6Click
end
end
object Window1: TMenuItem
Caption = '&Window'
GroupIndex = 9
object Tile1: TMenuItem
Caption = '&Tile'
Hint = 'Tile Opened Documents'
OnClick = Tile1Click
end
object Cascade1: TMenuItem
Caption = '&Cascade'
Hint = 'Cascade Opened Documents'
OnClick = Cascade1Click
end
object ArrangeIcons1: TMenuItem
Caption = '&Arrange Icons'
Hint = 'Arrange Icons'
OnClick = ArrangeIcons1Click
end
end
object Help1: TMenuItem
Caption = 'Help'
GroupIndex = 9
object UsingCastilloTextEditor1: TMenuItem
Caption = 'Using Castillo TextEditor...'
ShortCut = 112
OnClick = UsingCastilloTextEditor1Click
end
object N9: TMenuItem
Caption = '-'
end
object CastilloBuenoSystemsHomePage1: TMenuItem
Caption = 'Castillo Bueno Systems Home Page...'
Hint = 'Castillo Bueno Systems Home Page...'
OnClick = CastilloBuenoSystemsHomePage1Click
end
object PurchaseCastilloTextEditorOnline1: TMenuItem
Caption = 'Purchase Castillo TextEditor Online...'
Hint = 'Purchase Castillo TextEditor Online...'
OnClick = PurchaseCastilloTextEditorOnline1Click
end
object N8: TMenuItem
Caption = '-'
end
object About1: TMenuItem
Caption = 'About...'
Hint = 'About Castillo TextEditor...'
OnClick = About1Click
end
end
end
object PrintDialog1: TPrintDialog
Left = 251
Top = 124
end
object SaveFileDialog: TSaveDialog
Filter =
'All Files|*.*|Text Files|*.txt|Source Files|*.c; *.htm;*.html;*.' +
'bas;*.pas'
Left = 158
Top = 126
end
object FindDialog1: TFindDialog
Left = 220
Top = 124
end
object PopupMenu1: TPopupMenu
AutoPopup = False
Left = 341
Top = 123
object Find1: TMenuItem
Caption = 'Find...'
OnClick = Find1Click
end
object N7: TMenuItem
Caption = '-'
end
object Replace1: TMenuItem
Caption = 'Replace...'
OnClick = Replace1Click
end
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 127
Top = 126
end
object LMDShapeHint1: TLMDShapeHint
Font.Charset = DEFAULT_CHARSET
Font.Color = clInfoText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = hpBelowRight
Style = hsNoseRect
Left = 375
Top = 125
end
object LMDAboutDlg1: TLMDAboutDlg
Appname = 'Castillo TextEditor'
CaptionTitle = 'Castillo TextEditor'
Copyright = '(C) 1997-1998, Castillo Bueno Systems. All Rights Reserved.'
Description =
'Castillo TextEditor: A cost efective solution to all your text e' +
'diting neeeds.'
Effect = deExplodeExt
Jump = 'http://www.castillobueno.com'
Version = '3.00c'
Left = 403
Top = 125
end
object IniOut1: TIniOut
Items.Strings = (
'FrameForm;Height;;SOFTWARE\Castillo\Text Editor;Height;1;0'
'FrameForm;Left;;SOFTWARE\Castillo\Text Editor;Left;1;0'
'FrameForm;Width;;SOFTWARE\Castillo\Text Editor;Width;1;0'
'FrameForm;Top;;SOFTWARE\Castillo\Text Editor;Top;1;0'
'FrameForm;WindowState;wsNormal;SOFTWARE\Castillo\Text Editor;WSt' +
'ate;1;0'
'Toolbar971;DockedTo;;SOFTWARE\Castillo\Text Editor;ToolbarTo;1;0'
'ColorGrid1;BackgroundIndex;;SOFTWARE\Castillo\Text Editor;BackCo' +
'lor;1;0'
'ColorGrid1;ForegroundIndex;;SOFTWARE\Castillo\Text Editor;ForeCo' +
'lor;1;0'
'ColorGrid2;BackgroundIndex;;SOFTWARE\Castillo\Text Editor;String' +
'Color;1;0'
'ColorGrid2;ForegroundIndex;;SOFTWARE\Castillo\Text Editor;Commen' +
'tColor;1;0')
RegistryRoot = LOCAL_MACHINE
Left = 281
Top = 121
end
object LimitMe1: TLimitMe
Bija = 'CastilloTextEditor'
Terminate = True
BeforeTerminate = LimitMe1BeforeTerminate
Left = 13
Top = 117
end
object Timer2: TTimer
OnTimer = Timer2Timer
Left = 43
Top = 117
end
end